home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #6 / Amiga Plus CD - 1996 - No. 06.iso / pd / texte / texfontinst / contrib / zd / zdascii.mtx < prev    next >
Text File  |  1996-07-30  |  1KB  |  57 lines
  1. %%% fontinst-file:  zdascii.mtx
  2. %%% version:        1.0a
  3. %%% date:           94/08/09
  4. %%% author:         Constantin Kahn <kahn@math.uni-hannover.de>
  5. %%% abstract:       This file defines the glyphs `asciicircum',
  6. %%%                 `asciitilde', and `underscore'.
  7.  
  8. \relax
  9.  
  10. \metrics
  11.  
  12. % Uses the fontinst package.
  13.  
  14. \needsfontinstversion{1.332}
  15.  
  16. % Default values
  17.  
  18. \setint{underscorefraction}{720}
  19. \setint{underscorethickness}{50}
  20.  
  21. \setint{asciicircum-up}{0}
  22.  
  23. % Define the three glyphs
  24.  
  25. \setglyph{asciicircum}
  26.    \moveup{\int{asciicircum-up}}
  27.    \movert{\scale{\int{asciicircum-up}}{\int{italicslant}}}
  28.    \glyph{circumflex}{1000}
  29.    \movert{\neg{\scale{\int{asciicircum-up}}{\int{italicslant}}}}
  30.    \moveup{\neg{\int{asciicircum-up}}}
  31.    \resetdepth{\depth{circumflex}}
  32.    \resetheight{\height{circumflex}}
  33. \endsetglyph
  34.  
  35. \setglyph{asciitilde}
  36.    \glyph{tilde}{1000}
  37. \endsetglyph
  38.  
  39. \setglyph{underscore}
  40.    \movert{\sub{\scale{\width{dc-underscore}}
  41.                       {\div{\sub{1000}{\int{underscorefraction}}}{2}}}
  42.                {\scale{\depth{dc-underscore}}{\int{italicslant}}}}
  43.    \moveup{\neg{\depth{dc-underscore}}}
  44.    \glyphrule{\scale{\width{dc-underscore}}{\int{underscorefraction}}}
  45.       {\int{underscorethickness}}
  46.    \moveup{\depth{dc-underscore}}
  47.    \movert{\add{\scale{\width{dc-underscore}}
  48.                       {\div{\sub{1000}{\int{underscorefraction}}}{2}}}
  49.                {\scale{\depth{dc-underscore}}{\int{italicslant}}}}
  50. \endsetglyph
  51.  
  52. \endmetrics
  53.  
  54. \end{document}
  55.  
  56.  
  57.